home *** CD-ROM | disk | FTP | other *** search
/ Aminet 19 / Aminet 19 (1997)(GTI - Schatztruhe)[!][Jun 1997].iso / Aminet / gfx / board / rtgmasdev.lha / demos / mandel / mandelasm.a < prev    next >
Text File  |  1997-03-24  |  198b  |  12 lines
  1.     XDEF _MouseButton
  2. _MouseButton:
  3.     btst    #6,$bfe001  ; Ugly direct hardware hit!!!
  4.     beq     mb_set
  5.     moveq   #0,d0
  6.     bra     mb_exit
  7. mb_set:
  8.     moveq   #1,d0
  9. mb_exit:
  10.     rts
  11.     END
  12.